home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1999 March / EnigmA AMIGA RUN 35 (1999)(G.R. Edizioni)(IT)[!][issue 1999-03].iso / earcd / utils / zip4mat / formatibm next >
Text File  |  1999-01-01  |  185b  |  7 lines
  1. requestchoice >env:FM "" "Are you sure you want to format this ZIP disk..? " Yes No
  2. if val $FM eq 1
  3.    FormatZIP 1230scsi.device 5
  4.    ziptool >nil: zpc: eject
  5. endif
  6. delete >nil: env:fm
  7.